home *** CD-ROM | disk | FTP | other *** search
/ TeX 1995 July / TeX CD-ROM July 1995 (Disc 1)(Walnut Creek)(1995).ISO / macros / plain / contrib / labeldefs.tex < prev    next >
Encoding:
Text File  |  1992-08-26  |  1.1 KB  |  48 lines
  1. % Definitions to produce threecolumn output in TeX from
  2. % the TeXbook.
  3. %
  4.         % this is threecolumn for a newsletter. All of the pages have
  5.         % an 8 inch form size, the first page is offset 1.5 inches from
  6.         % the top, the rest are offset one inch from the top. The first
  7.         % page has an extra-high, two line headline.
  8.  
  9. \tenrm
  10. \hoffset=-.5in
  11. \voffset=-.02in 
  12. \parindent=0pt
  13. \tolerance=10000
  14. \vsize=9.04in 
  15. \nopagenumbers
  16.  
  17. \newbox\midcolumn
  18. \newbox\leftcolumn
  19. \newdimen\fullhsize 
  20. \newdimen\partialhsize
  21. \fullhsize=8.5in \hsize=2.8in
  22. \def\fullline{\hbox to\fullhsize}
  23. \def\columnbox{\leftline{\pagebody}}
  24.  
  25. \let\lr=L 
  26. \let\nextvskip=N 
  27.  
  28. \def\tripleformat
  29.  {\shipout\vbox
  30.  {\fullline{\box\leftcolumn\hfil\box\midcolumn\hfil\columnbox}
  31.  }           
  32.  \advancepageno
  33.  }
  34.  
  35. \output={\if L\lr
  36.  \global\setbox\leftcolumn=\columnbox \global\let\lr=M 
  37.  \else\if M\lr
  38.  \global\setbox\midcolumn=\columnbox \global\let\lr=R 
  39.  \else \tripleformat \global\let\lr=L\fi\fi
  40.  
  41.  \ifnum\outputpenalty>-20000 \else\dosupereject\fi}
  42. \font\bigrm=CMSS10 at 10pt
  43. \bigrm
  44.  
  45. \obeylines
  46. \def\label#1{\vbox to .98in{\vfill #1}}
  47. \def\zip#1{\line{\hfill #1\hfill}}
  48.